Top 10k strings from Venture (1983)(Protek Computing)(16k)[re-release].tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /
Back to the directory listing
4 "17",U;Y$;Y$;Y$;
2 Y$=" ":
2 L+V,M;" YOUR CASH NOW `";W:
2 (L,V+V)=":"
2 "20",U;Y$;
2 "20",L+V;"CASH HALVED":
2 "19",U;C$:
2 "17",U;Y$;Y$;Y$:
2 "17",M-V;"
2 "12";"YOU WIN":
1 venture2
1 venture
1 `20 FOR EACH OVER 100.
1 `1000 BURIED IN
1 `0, CASH HALVED
1 ` A B C D E F G H `
1 Z$="CHEESE COIN OIL CANTORCH FISH AEROSOL":
1 YOU NEED `2000
1 YOU HAVE 10 GOES
1 WITH ITEMS FOUND.
1 WINNING=`0
1 W=DIGITS CORRECT BUT IN ";
1 V;"RELOAD TO REPLAY";
1 V;"**ONLY ";G;"**":
1 V,L;"YOU SELECTED ";D
1 V+V;"WAIT":
1 USE ARR0W BUTTONS
1 U;A$;Y$;Y$;Y$;
1 U;"GOLD+CASH-EXIT FEE=`";G;Y$:
1 U;"ENTER NUMBER OF ITEM";
1 U;"(IF NONE, ENTER 0 TO RUN)"
1 TREASURE HUNT
1 TO WIN OVER `999
1 TO RELEASE BOMBS.
1 REDUCES BY `100
1 OUT OF MAZE
1 ONLY 4 ITEMS ALLOWED
1 ON THE RUNWAY. PRESS B
1 NOT ENOUGH GOLD--TRAPPED IN MAZE
1 NO ITEMS..BACK TO START
1 MOVE USING
1 MINI-VENTURE.
1 MASTERCODE
1 M;"WITHIN 12 TRIES. EACH ";
1 M;"SEND FOR SUPERMAN":
1 M;"GUESS THE 4-DIGIT CODE";
1 M;"DIGITS THEN PRESS ENTER";
1 M;"DIGIT IS 1-6. PRESS 4 ";
1 M,M;" MASTERCODE ";
1 M+V,U;"CASH:";
1 M+V,L+M-V;"
1 M+M,M+M;"SAFE LANDING":
1 LEAVE WHICH NUMBER?
1 L-V;"`1000 IF CORRECT.":
1 L,U;"YOU HAVE `1000 TO START. IF YOU LOSE A GAME YOUR CASH IS HALVED (CAN WIN `1000 IN MOST GAMES) ............................."
1 L,L-V;"PAY THE VENTURE";
1 L,L-V;"***SCORE=";G;"***";
1 L+V,M;"SELECT WHICH WILL WIN";
1 L+V,L;"TO RECOVER"
1 L+M,M;"WIN ";G;"-100*`20=`";(G-
1 L+M,M+M+V;D$
1 L+L;"GOLD=`0000";
1 L+L;"CASH=`";W;
1 I;".";Z$(AA
1 I-V,L-V;"WE HAVE LIFT-OFF"
1 I-V,L+M;"EXIT YOU HAVE":
1 I,U;"::::::::::::::::::::::::::::::::"
1 I,M-V;" ";
1 I,J-V;" ";
1 I+M-V,V;"WELL DONE."
1 GOLD AT EXIT.
1 GO NUMBER 1
1 G=G+W-K-K:
1 FOR EACH TRY.IF
1 FIGHT THE GUARDS
1 ENTER GRID REF
1 EACH WORTH `1000.
1 CRASH INTO OVER 100 CARS
1 COLLECT THE GOLD.
1 CASH=`
1 CASH SHORTAGE...MUST FIGHT
1 C(J)=X(J):
1 C$=("HUNGRY MICE"
1 C$=" "+C$:
1 BOMB AWAY THE BUILDINGS
1 B=V+V)+("RUSTY ROBOT"
1 B=V)+("GIANT MONEY SPIDER"
1 B=M-V)+("WILD CAT"
1 B=M)+("INVISIBLE OGRE"
1 B,V;"::::::"
1 B$=" "+B$:
1 AN AREA 8 X 8.
1 ALREADY HAVE...L=LEAVE
1 ACROSS AND DOWN
1 A=V+V)+("3"
1 A(UP) & Z(DOWN) KEY
1 A$="HERE IS A ":
1 A$=" ` ` ` ` ` ` ` ` ":
1 A$=" "+A$:
1 A$=" 1653 5316 5512 3425":
1 A$="
1 A$(J)="9":
1 5,6,7 & 8 TO MOVE
1 3.....`150
1 3 SAME..`500
1 2.....`150
1 2 SAME..`250
1 1983 Protek Computing Ltd";
1 .................
1 (TYPICAL INPUT IS D4)":
1 (I,J+V+V)=U
1 (A$(V+V))-
1 "ENTER GRID REF ";A$
1 "ENTER 4 DIGITS";A$:
1 "7";"YOU ARE SENTENCED";
1 "7";"WINNER THE SUM OF"
1 "7";"TO REPLAY VENTURE";
1 "7";" ";
1 "7",U;"`";W:
1 "5";"By G.Bobker";
1 "48");" ":
1 "48");" ";
1 "32598",W-
1 "3";"R=DIGITS IN RIGHT POSITION
1 "3");X(M-V)
1 "3");" WINS"
1 "3")+("VAMPIRE BAT"
1 "27";"---";
1 "27";" "
1 "26";"` ";
1 "26";"VALUE";
1 "26";"GO ";I
1 "24";" ";
1 "24";" ";
1 "23822"+I):
1 "22"-J,I;"
1 "21",U;Y$;
1 "20";" ":
1 "20",V+M;"TOO LATE. IT WAS ";
1 "20",U;A$;:
1 "20",L+L;Y$(
1 "20",L+L;"
1 "20"+L-V):
1 "19",V+V;"PRESS R TO REPLAY THIS HALF":
1 "19",U;Y$:
1 "19",U;A$:
1 "19",U;"T=TAKE. L=LEAVE."
1 "19",U;"CASH NOW `";W;". GOLD NOW `";G;
1 "19",I-V;"
1 "17",U;Y$:
1 "17",U;A$;Z$(AA
1 "17",U;"YOUR MOVE":
1 "17",U;"YOU DO NOT HAVE ";A:
1 "17",U;"LET BATTLE COMMENCE":
1 "17",U;"GUARDED BY ";C$;
1 "17",U;"FIGHT WITH WHAT?";
1 "17",U;" PLAY TAPE TO LOAD NEXT PART ":
1 "17",M-V;"YOU WIN":
1 "17",M-V;"LOST.....CASH HALVED":
1 "17",M-V;"GOLD":
1 "16",U;Y$;Y$;Y$;Y$;
1 "15";" ";C;" ";A;" ":
1 "15",M+M;G:
1 "15",L-V;"SELECT 1,2 OR 3"
1 "15",L-V;"
1 "12";"VENTURE";
1 "12",M;A$:
1 "11";"GOES R W":
1 "11";"CODE=";X(V);X(V+V);X(
1 "11",L+L;:
1 "11")+V+V:
1 "10"*H;")":
1 "1";"STOP THE TAPE":
1 " YOU WIN ";H;"% OF `1000 (`";
1 F=FIGHT R=RUN
1 (-`1000)":
1 & PRESS ENTER.
1 LAS VEGAS.
1 WRONG POSITION. "
1 ":
1 X
1
1